home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 60.zip / BS1 part 60 / Highspeed pascal.adf / Interface / Amiga.pas next >
Pascal/Delphi Source File  |  1992-01-16  |  412b  |  26 lines
  1. Unit Amiga;
  2.  
  3. Interface
  4. Uses Exec, AmigaDOS;
  5.  
  6.  
  7. Function CreatePort
  8.          (name: pCString;
  9.           pri: Integer): pMsgPort;
  10.  
  11. Procedure DeletePort (port: pMsgPort);
  12. Function CreateExtIO
  13.          (port: pMsgPort;
  14.           size: Integer): pIORequest;
  15.  
  16. Procedure DeleteExtIO (ioReq: pIORequest);
  17. Procedure NewList(list: pList);
  18. Function SendPkt
  19.          (pid: pMsgPort;
  20.           action: LongInt;
  21.           var args;
  22.           nargs: Integer): LongInt;
  23.  
  24.  
  25. End.
  26.